|
Autocad VBA : Block - Attribute
rrrrough am 31.03.2004 um 10:17 Uhr (0)
ich wende mich mit folgendem problem an euch: ich versuche attribute aus einer BlockReferenz auszulesen auszulesen: Attribute = DerBlock.GetAttributes das funktioniert wenn der Block innerhalb der zeichnung mit BLOCK definiert wurde das funktioniert nicht wenn der block als file in die zeichnung eingefügt wurde (die angegebene Programmzeile wird mit der Fehlermeldung quittiert: Objekt wurde gelöscht) warum ist das so? wie kann ich auf die attribute aus dem file zugreifen? ------------------ leute: vielen d ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Block - Attribute
rrrrough am 03.04.2004 um 08:41 Uhr (0)
ja, wahrscheinlich verwechsle ich was ... sind ja noch die ersten versuche. aber ich schwöre: ich hatte in der gleichen zeichnung die verschiedenen blöcke, die mit der gleichen schleife abgefragt wurden. Selbstverständlich waren beide in der Blockauflistung - nur von einem waren die attribute nicht zu bekommen - fehlermeldung: ist aber egal, dank deiner Hilfe und Bempühungen konnte ich das problem ja lösen - läuft jetzt wie am schnürchen. ben ------------------ leute: vielen dank
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Block - Attribute
rrrrough am 02.04.2004 um 07:56 Uhr (0)
also vielen dank für die unterstützung - insbesondere für den code. so konnte ich sehen das ich eigentlich alles richtig gemacht habe, nur: den funktionsaufruf habe ich von einer UserForm ausgelöst, die per UserForm.Show vbModeless eingeblendet. und kurios, kurios in genau diesem fall funktioniert getAttributes nur noch wenn der block in der zeichnung erstellt wurde. also: Forms normal einblenden ... danke ------------------ leute: vielen dank
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Blockattribute
rrrrough am 05.05.2004 um 20:52 Uhr (0)
z.B. so: im anhang gibt es eine passende zeichnung zum .dvb Public Sub BlockReferenzBearbeiten() WICHTIG: HIER GEHT ES UM BLOCKREFERNZEN NICHT UM DIE BEARBEITUNG DES BLOCKES SELBST ERST MAL DEN ENTSPRECHENDEN BLOCK FINDEN - ICH DURCHSUCHE ALLE OBJEKTE - MAN KÖNNTE ABER AUCH DIE DATENBANK MIR SELECTIONSET DURCHSUCHEN Dim BlockCol As Collection Dim Objekt As Object Set BlockCol = New Collection For Each Objekt In ThisDrawing.ModelSpace If TypeName(Objekt) = IAcadBlockReference Then If Objekt. ...
|
| In das Form Autocad VBA wechseln |